%
function [ ] = testEpsilon( name, epsilon )
addpath(genpath('../io')); addpath(genpath('../obj-tools')); addpath(genpath('../export'));
addpath(genpath('../neighborhood'));

resDir = 'res/';
data = load( [resDir name '.mat' ] );
rawDistMatrix = load( [resDir name 'DistMatrix.mat'] );
distMatrix = rawDistMatrix.distMatrix;

vert = data.frames(1, :);
vert = toMatrix(vert);
nV = size( vert, 1);
vertId = 31;
% epsilon = 30.0;
colorList = zeros(nV, 3);

neigh = neighborhoodOfVertex(vertId, distMatrix, epsilon);
nn = size(neigh, 2);
for i = 1 : nn
    colorList( neigh(i),:) = 250;
end % for

exportPLY(['testEpsilon' name '.ply'], vert, colorList(:,1:3), data.topology);

end % function testEpsilon

